home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Programming / powerd / lib / chunky.lha / chunky_ppc / PutPixel.ass < prev    next >
Encoding:
Text File  |  1980-11-25  |  423 b   |  30 lines

  1. # PutPixel(chunky:r3:PTR TO chunky,x:r4:LONG,y:r5:LONG,colour:r6:LONG)
  2.  
  3.     .text
  4.     .global    _PutPixel
  5.  
  6. _PutPixel:
  7.     mr.    r7,r3
  8.     beq    .finish
  9.     mr.    r4,r4
  10.     blt    .finish
  11.     mr.    r5,r5
  12.     blt    .finish
  13.     lwz    r8,0(r7)
  14.     cmpw    r4,r8
  15.     bge    .finish
  16.     lwz    r0,4(r7)
  17.     cmpw    r5,r0
  18.     bge    .finish
  19.  
  20.     lwz    r7,8(r7)
  21.     mullw    r5,r5,r8
  22.     add    r5,r5,r4
  23.     lbzx    r3,r7,r5
  24.     stbx    r6,r7,r5
  25.     andi.    r3,r3,0xff
  26. .finish:    blr
  27.  
  28.     .type    _PutPixel,@function
  29.     .size    _PutPixel,$-_PutPixel
  30.